home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Toolbox / Visual Basic Toolbox (P.I.E.)(1996).ISO / boxes / aboutbox / calling.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1996-03-17  |  2.7 KB  |  64 lines
  1. VERSION 4.00
  2. Begin VB.Form FrmCall 
  3.    Caption         =   "About Box Sample for VB4"
  4.    ClientHeight    =   1725
  5.    ClientLeft      =   1320
  6.    ClientTop       =   1890
  7.    ClientWidth     =   4320
  8.    Height          =   2415
  9.    Icon            =   "CALLING.frx":0000
  10.    Left            =   1260
  11.    LinkTopic       =   "Form1"
  12.    LockControls    =   -1  'True
  13.    ScaleHeight     =   1725
  14.    ScaleWidth      =   4320
  15.    Top             =   1260
  16.    Width           =   4440
  17.    Begin VB.Label Label1 
  18.       Alignment       =   2  'Center
  19.       BorderStyle     =   1  'Fixed Single
  20.       Caption         =   $"CALLING.frx":0442
  21.       Height          =   1515
  22.       Left            =   120
  23.       TabIndex        =   0
  24.       Top             =   60
  25.       Width           =   4050
  26.       WordWrap        =   -1  'True
  27.    End
  28.    Begin VB.Menu MnuHelp 
  29.       Caption         =   "&Help"
  30.       Begin VB.Menu MnuAboutBox 
  31.          Caption         =   "&About..."
  32.       End
  33.    End
  34. Attribute VB_Name = "FrmCall"
  35. Attribute VB_Creatable = False
  36. Attribute VB_Exposed = False
  37. ' *******************************************************************
  38. ' Some code and files: 1996 by Gregory H. Bragg, SofTecH Development
  39. '                      1995 by David Warren, MMC Software
  40. ' Some of the Registry code is from the VB4 Setup Kit, SETUP1 files.
  41. ' Originally published by PC Magazine. Ported over to
  42. ' 32 Bit VB4 by Gregory H. Bragg starting March 6, 1996
  43. ' Original: November 8, 1993  By Neil J. Rubenking
  44. ' Revised:  March 10, 1996    By Gregory H. Bragg
  45. ' To use the generic 'About Box' Form file, your VBP file must
  46. ' also include the module ABOUTBOX.BAS.  Just call the function
  47. ' DisplayAboutBox, passing parameters specific to your program.
  48. ' DO NOT load the form FAB prior to calling DisplayAboutBox!
  49. ' *******************************************************************
  50. Option Explicit
  51. Private Sub MnuAboutBox_Click()
  52.     ' The generic About Box is implemented in the files ABOUTBOX.FRM
  53.     ' and ABOUTBOX.BAS.  Function DisplayAboutBox() handles it all.
  54.     DisplayAboutBox FrmCall, "Multi-Print", 2#, 1996, _
  55.                     Space$(5) + "Gregory H. Bragg", Space$(40) + "(416) 399-0995", _
  56.                     "Serial # 100000022" + Space$(4) + "CompuServe: 75027, 2674", _
  57.                     0, False, 0, 0
  58.                     
  59. '    DisplayAboutBox FrmCall, "Multi-Print", 2#, 1996, _
  60. '                    Space$(5) + "Gregory H. Bragg", Space$(40) + "(416) 399-0995", _
  61. '                    "Serial # 100000022" + Space$(4) + "CompuServe: 75027, 2674", _
  62. '                    AB_NO_VIRTUAL Or AB_NO_PAGING Or AB_NO_PHYSICAL Or AB_NO_CPU Or AB_NO_MEMLOAD, False, 0, 0
  63. End Sub
  64.